Electronic Clipper 1996 November/Electronic Clipper 1996 November.iso/ideasrc/pyramid.dir/00061.ls

Text File | 1996-10-11 | 189 b | 10 lines

on mouseUp
  repeat with n = 2 to 21
    if sprite n intersects 22 then
      put integer(field "meats" + 1) into field "meats"
      go("mouthopen")
      exit
    end if
  end repeat
end